* calc/calc-forms.el (math-date-to-dt): Use integer date

when calling `math-date-to-julian-dt' and 'math-date-to-gregorian-dt'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d16724b6acc58bc27a3be66388a39e754ea4423c..56dd00c55649d2c1e48cf507e8b05c557e33491b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-11-18  Jay Belanger  <jay.p.belanger@gmail.com>
+
+       * calc/calc-forms.el (math-date-to-dt): Use integer date when
+       calling `math-date-to-julian-dt' and 'math-date-to-gregorian-dt'.
+
 2012-11-18  Glenn Morris  <rgm@gnu.org>
 
        * image.el (insert-image, insert-sliced-image): Doc fix.

diff --git a/lisp/calc/calc-forms.el b/lisp/calc/calc-forms.el
index d1df20c697c7774ce8fa03e56c7a7bb314f54f55..709250f9ba918f5c7f4643b583653cc4e70315d9 100644 (file)
--- a/lisp/calc/calc-forms.el
+++ b/lisp/calc/calc-forms.el
@@ -443,8 +443,8 @@ in the Gregorian calendar and the remaining part determines the time."
                                    (nth 3 calc-gregorian-switch)
                                    (apply 'math-absolute-from-gregorian-dt calc-gregorian-switch))
 ))
-                 (math-date-to-julian-dt value)
-               (math-date-to-gregorian-dt value))))
+                 (math-date-to-julian-dt date)
+               (math-date-to-gregorian-dt date))))
     (if (math-integerp value)
         dt
       (append dt